(vc-sccs-registered): Handle the autoload cookie so that the

definition is found by `find-function-search-for-symbol' and etags.

diff --git a/lisp/vc-sccs.el b/lisp/vc-sccs.el
index eddc990a4f4b345048fa4d0c859bccd1e212850a..c5f2d660a790a6bfd0391371f1512b49938c4019 100644 (file)
--- a/lisp/vc-sccs.el
+++ b/lisp/vc-sccs.el
@@ -5,7 +5,7 @@
 ;; Author:     FSF (see vc.el for full credits)
 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
 
-;; $Id: vc-sccs.el,v 1.16 2002/10/08 15:35:03 monnier Exp $
+;; $Id: vc-sccs.el,v 1.17 2002/10/08 20:24:21 monnier Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -88,8 +88,9 @@ For a description of possible values, see `vc-check-master-templates'."
 ;;; State-querying functions
 ;;;
 
-;;;###autoload
-(progn (defun vc-sccs-registered (f) (vc-default-registered 'SCCS f)))
+;;; The definition should be at beginning of line (for Help and etags).
+;;;###autoload(defun vc-sccs-registered (f) (vc-default-registered 'SCCS f))
+(defun vc-sccs-registered (f) (vc-default-registered 'SCCS f))
 
 (defun vc-sccs-state (file)
   "SCCS-specific function to compute the version control state."